00100 TOOT 0 10; 00200 P2 1; 00300 P3 .2 C4 C4 .2 G4,G4 00350 .2 A4,A .2 B,B .2 FS,FS; 00400 END; 00500 INSERT 0; 00600 P3=100; 00700 INSERT -1; 00800 P3=99; 00900 RUN;